n79= if (%currentread isin %text) { set %lev %levcount | goto end }
n80= goto start
n81= :end
n82= unset %levcount %text %currentread
n83=}
n84=/adduser {
n85= set %nick $$1
n86= if (%nick == $me) || ($address(%nick,2) == $address($me,2)) && ($address(%nick,3) == $address($me,3)) { echo 4 -a %ver You do not have to add yourself, or your clone, to the user list | goto end }
n87= if ($address(%nick,3) == $null) { echo 4 -a %ver Cannot establish a user address...perform a whois | goto end }
n88= set %address $address(%nick,3)
n89= superopcheck | if (%useradd == 1) && (%domainadd == 1) && (%lev != 0) { echo 4 -a %ver %nick is already on the super ops list by Dynamic IP | goto end }
n90= if (%lev != 0) && (%useradd != 1) { echo 4 -a %ver %nick was removed from the super ops list by Dynamic IP | write -dl $+ %lev $mircdirsettings\ $+ superop.txt }
n91= voicedcheck | if (%useradd == 2) && (%domainadd == 1) && (%lev != 0) { echo 4 -a %ver %nick is already on the voiced user list by Dynamic IP | goto end }
n92= if (%lev != 0) && (%useradd != 2) { echo 4 -a %ver %nick was removed from the voiced user list by Dynamic IP | write -dl $+ %lev $mircdirsettings\ $+ voiced.txt }
n93= deniedcheck | if (%useradd == 3) && (%domainadd == 1) && (%lev != 0) { echo 4 -a %ver %nick is already on the denied user list by Dynamic IP | goto end }
n94= if (%lev != 0) && (%useradd != 3) { echo 4 -a %ver %nick was removed from the denied ops list by Dynamic IP | write -dl $+ %lev $mircdirsettings\ $+ denied.txt }
n95= shitlistcheck | if (%useradd == 4) && (%domainadd == 1) && (%lev != 0) { echo 4 -a %ver %nick is already on the shitlist by Dynamic IP | goto end }
n96= if (%lev != 0) && (%useradd != 4) { echo 4 -a %ver %nick was removed from the shitlist by Dynamic IP | write -dl $+ %lev $mircdirsettings\ $+ shitlist.txt }
n97= set %address $address(%nick,2)
n98= superopcheck | if (%useradd == 1) && (%domainadd == 2) && (%lev != 0) { echo 4 -a %ver %nick is already on the super ops list by Static IP | goto end }
n99= if (%lev != 0) && (%useradd != 1) { echo 4 -a %ver %nick was removed from the super ops list by Static IP | write -dl $+ %lev $mircdirsettings\ $+ superop.txt }
n100= voicedcheck | if (%useradd == 2) && (%domainadd == 2) && (%lev != 0) { echo 4 -a %ver %nick is already on the voiced user list by Static IP | goto end }
n101= if (%lev != 0) && (%useradd != 2) { echo 4 -a %ver %nick was removed from the voiced user list by Static IP | write -dl $+ %lev $mircdirsettings\ $+ voiced.txt }
n102= deniedcheck | if (%useradd == 3) && (%domainadd == 2) && (%lev != 0) { echo 4 -a %ver %nick is already on the denied ops list by Static IP | goto end }
n103= if (%lev != 0) && (%useradd != 3) { echo 4 -a %ver %nick was removed from the denied ops list by Static IP | write -dl $+ %lev $mircdirsettings\ $+ denied.txt }
n104= shitlistcheck | if (%useradd == 4) && (%domainadd == 2) && (%lev != 0) { echo 4 -a %ver %nick is already on the shitlist by Static IP | goto end }
n105= if (%lev != 0) && (%useradd != 4) { echo 4 -a %ver %nick was removed from the shitlist by Static IP | write -dl $+ %lev $mircdirsettings\ $+ shitlist.txt }
n106= if (%useradd == 1) && (%domainadd == 1) { write $mircdirsettings\ $+ superop.txt $address(%nick,3) | echo 4 -a %ver %nick was added to the super ops list by Dynamic IP | opnick }
n107= if (%useradd == 2) && (%domainadd == 1) { write $mircdirsettings\ $+ voiced.txt $address(%nick,3) | echo 4 -a %ver %nick was added to the voiced user list by Dynamic IP | voicenick }
n108= if (%useradd == 3) && (%domainadd == 1) { write $mircdirsettings\ $+ denied.txt $address(%nick,3) | echo 4 -a %ver %nick was added to the denied ops list by Dynamic IP | deopnick }
n109= if (%useradd == 4) && (%domainadd == 1) { write $mircdirsettings\ $+ shitlist.txt $address(%nick,3) | echo 4 -a %ver %nick was added to the shitlist by Dynamic IP | remove }
n110= if (%useradd == 1) && (%domainadd == 2) { write $mircdirsettings\ $+ superop.txt $address(%nick,2) | echo 4 -a %ver %nick was added to the super ops list by Static IP | opnick }
n111= if (%useradd == 2) && (%domainadd == 2) { write $mircdirsettings\ $+ voiced.txt $address(%nick,2) | echo 4 -a %ver %nick was added to the voiced user list by Static IP | voicenick }
n112= if (%useradd == 3) && (%domainadd == 2) { write $mircdirsettings\ $+ denied.txt $address(%nick,2) | echo 4 -a %ver %nick was added to the denied ops list by Static IP | deopnick }
n113= if (%useradd == 4) && (%domainadd == 2) { write $mircdirsettings\ $+ shitlist.txt $address(%nick,2) | echo 4 -a %ver %nick was added to the shitlist by Static IP | remove }
n272= if (%punish == 2) { kick $chan $nick %ver Channel text repeating detected ( $+ %repfloodl repeats in less than %repfloods seconds) } | else { msg $chan %ver Initiating silence ban for $nick $+ : Channel text repeating detected ( $+ %repfloodl repeats in less than %repfloods seconds) }
n281= if (%punish == 2) { kick $chan $nick %ver Length text flood detected (maximum is %lengthfloodl $+ , that was $len($parms) $+ ) } | else { msg $chan %ver Initiating silence ban for $nick $+ : Length text flood detected (maximum is %lengthfloodl $+ , that was $len($parms) $+ ) }
n282= goto end
n283= }
n284= if ($count($parms,) > %colourfloodl) && (%colourflood == 1) {
n286= if (%punish == 2) { kick $chan $nick %ver Colour text flood detected (no more than %colourfloodl colour changes allowed) } | else { msg $chan %ver Initiating silence ban for $nick $+ : Colour text flood detected (no more than %colourfloodl colour changes allowed) }
n287= goto end
n288= }
n289= if (%capsflood == 0) { goto end }
n290= set -q %length $len($parms) | if (%length < %capsfloodl) { goto end }
n291= set -q %count 1
n292= :start
n293= if (%count > %length) { goto kick }
n294= if $asc($mid(%count,%length,$parms)) == $asc($upper($mid(%count,%length,$parms))) { inc %count | goto start } | else { goto end }
n308= ignore -pu30 $nick 3 | echo 4 -a %ver Private repeating flood detected from $nick ( $+ %repfloodpl repeats in less than %repfloodps seconds) -=30 Second Private Ignore=-
n309= if (%privatekick == 1) { set %reason Private repeating flood detected ( $+ %repfloodpl repeats in less than %repfloodps seconds) -=Temp Ban=- | set %nick $nick | privatekick }
n316= if ($len($parms) > %lengthfloodpl) && (%lengthfloodp == 1) {
n317= ignore -pu30 $nick 3 | echo 4 -a %ver Private length flood detected from $nick (maximum is %lengthfloodpl $+ , that was $len($parms) $+ ) -=30 Second Private Ignore=-
n318= if (%privatekick == 1) { set %reason Private length flood detected (maximum is %lengthfloodpl $+ , that was $len($parms) $+ ) -=Temp Ban=- | set %nick $nick | privatekick }
n319= goto end
n320= }
n321= if ($count($parms,) > %colourfloodpl) && (%colourfloodp == 1) {
n322= ignore -pu30 $nick 3 | echo 4 -a %ver Private colour flood detected from $nick (no more than %colourfloodpl colour changes allowed) -=30 Second Private Ignore=-
n323= if (%privatekick == 1) { set %reason Private colour flood detected (no more than %colourfloodpl colour changes allowed) -=Temp Ban=- | set %nick $nick | privatekick }
n324= goto end
n325= }
n326= if (%capsfloodp == 0) { goto end }
n327= set -q %length $len($parms) | if (%length < %capsfloodpl) { goto end }
n328= set -q %count 1
n329= :start
n330= if (%count > %length) { goto kick }
n331= if $asc($mid(%count,%length,$parms)) == $asc($upper($mid(%count,%length,$parms))) { inc %count | goto start } | else { goto end }
n332= :kick
n333= ignore -pu30 $nick 3 | echo 4 -a %ver Private CAPS flood detected from $nick -=30 Second Private Ignore=-
n334= if (%privatekick == 1) { set %reason Private CAPS flood detected -=Temp Ban=- | set %nick $nick | privatekick }
n335= :end
n336= unset %length %count %address %lev %parms
n337=}
n338=/autojoin {
n339= set %count 0
n340= :start
n341= inc %count
n342= if ($read -l $+ %count $mircdirsettings\ $+ autojoin.txt == $null) { goto end }
n411= set %privatemsgflood 1 | set %privatemsgfloodl 5 | set %privatemsgfloods 10 | set %privatenoticeflood 1 | set %privatenoticefloodl 5 | set %privatenoticefloods 10
n412= set %repfloodp 1 | set %repfloodpl 2 | set %repfloodps 10 | set %lengthfloodp 1 | set %lengthfloodpl 300
n413= set %colourfloodp 1 | set %colourfloodpl 10 | set %capsfloodp 1 | set %capsfloodpl 50
n414= set %dcctextflood 1 | set %dcctextfloodl 5 | set %dcctextfloods 10 | set %ctcpflood 1 | set %ctcpfloodl 2 | set %ctcpfloods 10
n415= set %dccflood 1 | set %dccfloodl 2 | set %dccfloods 10 | set %soundflood 1 | set %soundfloodl 2 | set %soundfloods 5 | set %invite 2
n416= set %immune 0 | set %privatekick 1 | echo 4 -a %ver Private flood protection has been enabled with no immunity and private kicking on